home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 1.iso / ARGONET / PD / DESKTOP / FLOSSYDESK.SPK / !FlDesk / !Run < prev    next >
Text File  |  1996-08-16  |  1KB  |  39 lines
  1. |>!FlDesk.!Run
  2. Set FlDesk$Dir <Obey$Dir>
  3.  
  4. |--------------------------------------
  5. |Set following to 0 if you have an ARM2, else 1
  6. |
  7. Set FlDesk$Flags 1
  8.  
  9. |--------------------------------------
  10. |Check for modules
  11. |(FlDesk$Flags notifies !RunImage about the state
  12. | of the machine. It is hoped that this mechanism
  13. | will allow FlDesk to run on pre RO3 machines, but
  14. | with limited functionality.
  15. | The following are ORed together:
  16. |    1 - ARM3 present
  17. |    2 - ColourTrans present
  18. |    4 - MessageTrans present
  19. |    8 - RISCOS 3.00 or above
  20. |)
  21. SetEval FlDesk$Flags <FlDesk$Flags>+2+4+8
  22. RMEnsure ColourTrans 0.00 SetEval FlDesk$Flags <FlDesk$Flags>-2
  23. RMEnsure MessageTrans 0.00 SetEval FlDesk$Flags <FlDesk$Flags>-4
  24. RMEnsure UtilityModule 3.00 SetEval FlDesk$Flags <FlDesk$Flags>-8
  25.  
  26. |--------------------------------------
  27. |Pointers to user-defined directories
  28. |
  29. Set FlDesk$Rc    <FlDesk$Dir>.Rc
  30. Set FlDesk$Waste <FlDesk$Dir>.Waste
  31. Set FlDesk$CurrentDir :0.$
  32.  
  33. |--------------------------------------
  34. |Load sprites and go for main application
  35. |
  36. IconSprites <FlDesk$Dir>.!Sprites
  37. IconSprites <FlDesk$Dir>.Sprites
  38. WimpSlot -min 128K -max 128K
  39. Run <FlDesk$Dir>.!RunImage